home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1999 March / EnigmA AMIGA RUN 35 (1999)(G.R. Edizioni)(IT)[!][issue 1999-03].iso / earcd / devel / vbcc-68k-src / machines / amiga68k / libsrc / stdio / gets.c < prev    next >
C/C++ Source or Header  |  1999-01-01  |  263b  |  15 lines
  1. #include <stdio.h>
  2.  
  3. char *gets(char *s)
  4. /*  gefaehrlich...      */
  5. {
  6.     char *p=s;int k;
  7.     while(1){
  8.         k=getchar();
  9.         if(k==EOF||k=='\n') break;
  10.         *p++=k;
  11.     }
  12.     *p=0;
  13.     if((stdin->flags&_ERR)||(p==s&&k==EOF)) return 0; else return s;
  14. }
  15.